home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 1, No. 12 (1982-08)(Softdisk)(Side A).zip / Softdisk Magazette Volume 1, No. 12 (1982-08)(Softdisk)(Side A).do / CALC-MAN.COVER.bas < prev    next >
BASIC Source File  |  1996-12-24  |  407b  |  11 lines
  1. 1  REM   CALC-MAN.COVER
  2. 10  TEXT : HOME 
  3. 20  VTAB 6: PRINT "ONE PICTURE IS WORTH A THOUSAND WORDS."
  4. 30  VTAB 15: PRINT "YEAH, BUT I COULD DISPLAY A THOUSAND"
  5. 32  PRINT : PRINT "WORDS WHILE YOU ARE LOADING ONE PICTURE"
  6. 34  PRINT  CHR$(4)"BLOAD CALC-MAN.PIC"
  7. 40  TEXT : POKE  -16297,0: POKE  -16302,0: POKE  -16304,0
  8. 50  FOR I = 1 TO 6000: NEXT 
  9. 60  TEXT : HOME 
  10. 65  PRINT 
  11. 70  PRINT "<CTRL-D>RUN KICK.IT.OFF"